(comint-mode-map): Explicitly bind `delete' and `kp-delete'

so they never do EOF.

diff --git a/lisp/comint.el b/lisp/comint.el
index 047cc3b80fb09d63b67aa36b649054b70fd647f7..96c36f3496fa7dac428658f557c9f4c9f5aec11e 100644 (file)
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -453,6 +453,10 @@ executed once when the buffer is created."
     (define-key map "\e\C-l"     'comint-show-output)
     (define-key map "\C-m"       'comint-send-input)
     (define-key map "\C-d"       'comint-delchar-or-maybe-eof)
+    ;; The following two are standardly aliased to C-d,
+    ;; but they should never do EOF, just delete.
+    (define-key map [delete]     'delete-char)
+    (define-key map [kp-delete]          'delete-char)
     (define-key map "\C-c "      'comint-accumulate)
     (define-key map "\C-c\C-x"           'comint-get-next-from-history)
     (define-key map "\C-c\C-a"           'comint-bol-or-process-mark)